# Name: [Gallery Email Alerts]
# By: [Wyatt Preul]
# [This will test try to enable email globally in the Control Panel and subscribe to email alerts in photo gallery]
# Maintenance:
#   [10/4/2006] : [WLP] : Created
#

$LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..') if $0 == __FILE__
require 'watir'
include Watir
require 'test/unit'
require '../watir.config.rb'

class TC_GalleryEmailAlerts_test < Test::Unit::TestCase
      
      def startup			
        @@ie = Watir::IE.start($SITE_URL)
      end
    
      def ie
        if defined? @@ie
          @@ie
        else
          startup
        end
      end
      

    def test_01_verifyHomeText
        assert(ie.contains_text(/Community Server/))	
    end
      
    def test_02_verifyLoginLinksExist
      if !(ie.link(:text, 'Sign in').exists?)
        ie.goto($SITE_URL + 'logout.aspx')
        ie.refresh
        ie.goto($SITE_URL)
        ie.refresh
      end
	  end
    
    def test_03_navigateToLogin
      ie.link(:text, 'Sign in').click
      assert(ie.contains_text("Sign in name"))
    end
	  
	  def test_04_populateLoginForm
      ie.text_field(:id, /username$/).value = $ADMIN_USER
      assert(ie.text_field(:id, /username$/).verify_contains($ADMIN_USER))
      
      ie.text_field(:id, /password$/).value = $ADMIN_PASSWORD
      assert(ie.text_field(:id, /password$/).verify_contains($ADMIN_PASSWORD))
	  end
	  
    def test_05_submitLoginForm
      ie.link(:id, /loginButton$/).click
      test_01_verifyHomeText
    end
    
    def test_06_verifyControlPanel
      assert(ie.link(:text, /Control Panel/).exists?)
      ie.link(:text, /Control Panel/).click
      assert(ie.contains_text(/Community Server Announcements/))
      assert(ie.link(:text, /Administration/).exists?)
      ie.link(:text, /Administration/).click
      assert(ie.contains_text(/Community Server Announcements/))
    end
    
    def test_07_verifyControlPanelTabBarLinks
      assert_equal $SITE_URL + 'controlpanel/default.aspx', ie.link(:text, 'Dashboard').href
      assert_equal $SITE_URL + 'controlpanel/blogs', ie.link(:text, 'My Blogs').href
      assert_equal $SITE_URL + 'controlpanel/photos/', ie.link(:text, 'My Photos').href
      assert_equal $SITE_URL + 'controlpanel/files', ie.link(:text, 'My Files').href
      assert_equal $SITE_URL + 'controlpanel/moderation', ie.link(:text, 'Forums Moderation').href
      assert_equal $SITE_URL + 'controlpanel/Setup.aspx', ie.link(:text, 'Administration').href
      assert_equal $SITE_URL + 'controlpanel/Reporting/default.aspx', ie.link(:text, 'Reporting').href
    end
    
    def test_08_navigateToEmailSettings
      ie.goto($SITE_URL + 'controlpanel/Settings/Email.aspx')
      
      #Assert that the links exist
      assert(ie.link(:text, 'Exit Control Panel and Return to Site').exists?)
      assert(ie.link(:text, 'Dashboard').exists?)
      assert(ie.link(:text, 'My Blogs').exists?)
      assert(ie.link(:text, 'My Photos').exists?)
      assert(ie.link(:text, 'My Files').exists?)
      assert(ie.link(:text, 'Forums Moderation').exists?)
      assert(ie.link(:text, 'Administration').exists?)
      assert(ie.link(:text, 'Reporting').exists?)
      assert(ie.link(:text, 'General Site Settings').exists?)
      assert(ie.link(:text, 'Site Name & Description').exists?)
      assert(ie.link(:text, 'Applications').exists?)
      assert(ie.link(:text, 'Contact Info').exists?)
      assert(ie.link(:text, 'RSS Settings').exists?)
      assert(ie.link(:text, 'Post Settings').exists?)
      assert(ie.link(:text, 'Date / Time Settings').exists?)
      assert(ie.link(:text, 'Email Settings').exists?)
      assert(ie.link(:text, 'IP Address Tracking').exists?)
    end
    
    def test_09_confirmFieldsExist
      #Assert that all of the radio buttons exist
      assert(ie.radio(:id, /EnableEmail_0$/).exists?)
      assert(ie.radio(:id, /EnableEmail_1$/).exists?)
      assert(ie.radio(:id, /SmtpServerUsingNtlm_0$/).exists?)
      assert(ie.radio(:id, /SmtpServerUsingNtlm_1$/).exists?)
      assert(ie.radio(:id, /SmtpServerRequiredLogin_0$/).exists?)
      assert(ie.radio(:id, /SmtpServerRequiredLogin_1$/).exists?)
      
      #Assert that all of the text fields exist
      assert(ie.text_field(:id, /TaskRegion_EmailEncoding$/).exists?)
      assert(ie.text_field(:id, /TaskRegion_EmailThrottle$/).exists?)
      assert(ie.text_field(:id, /TaskRegion_SmtpServer$/).exists?)
      assert(ie.text_field(:id, /TaskRegion_SmtpServerUserName$/).exists?)
      assert(ie.text_field(:id, /TaskRegion_SmtpServerPassword$/).exists?)
      assert(ie.text_field(:id, /TaskRegion_SmtpPortNumber$/).exists?)
    end
    
    def test_10_enableEmailAndSave
      ie.radio(:id, /EnableEmail_0$/,'True').set()
      ie.link(:id, /TaskRegion_SaveButton$/).click
      
      assert(ie.contains_text("Settings successfully saved."))
    end
    
    def test_99_closeIE
      ie.close
    end
end